home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 7 / BBS in a Box - Macintosh - Volume VII (BBS in a Box) (January 1993).iso / Files / Hyper / I-J / If Monks had Macs....cpt / If Monks had Macs... / Imitatio Christi / background_34135.txt < prev    next >
Text File  |  1992-02-09  |  6KB  |  266 lines
  1. -- background: 34135 from stack: in
  2. -- bmap block id: 39251
  3. -- flags: 0000
  4. -- background id: 0
  5. -- name: ChapHeadCard
  6. ----- HyperTalk script -----
  7. on closeCard
  8.   if visible of bg fld "Ref" is true then cleaRef
  9.   if visible of bg btn "RefIndex" is true then hide bg btn "RefIndex"
  10.   pass closeCard
  11. end closeCard
  12.  
  13.  
  14. -- part 13 (button)
  15. -- low flags: 00
  16. -- high flags: 0000
  17. -- rect: left=471 top=15 right=49 bottom=507
  18. -- title width / last selected line: 0
  19. -- icon id / first selected line: 25868 / 25868
  20. -- text alignment: 1
  21. -- font id: 0
  22. -- text size: 12
  23. -- style flags: 0
  24. -- line height: 16
  25. -- part name: cont
  26.  
  27.  
  28. -- part 14 (button)
  29. -- low flags: 00
  30. -- high flags: 2000
  31. -- rect: left=471 top=63 right=97 bottom=507
  32. -- title width / last selected line: 0
  33. -- icon id / first selected line: 28845 / 28845
  34. -- text alignment: 1
  35. -- font id: 0
  36. -- text size: 12
  37. -- style flags: 0
  38. -- line height: 16
  39. -- part name: FindBtn
  40.  
  41.  
  42. -- part 16 (button)
  43. -- low flags: 00
  44. -- high flags: 2000
  45. -- rect: left=471 top=110 right=144 bottom=507
  46. -- title width / last selected line: 0
  47. -- icon id / first selected line: 28841 / 28841
  48. -- text alignment: 1
  49. -- font id: 0
  50. -- text size: 12
  51. -- style flags: 0
  52. -- line height: 16
  53. -- part name: RandomCard
  54.  
  55.  
  56. -- part 26 (button)
  57. -- low flags: 00
  58. -- high flags: 2000
  59. -- rect: left=471 top=157 right=191 bottom=507
  60. -- title width / last selected line: 0
  61. -- icon id / first selected line: 28843 / 28843
  62. -- text alignment: 1
  63. -- font id: 216
  64. -- text size: 12
  65. -- style flags: 0
  66. -- line height: 16
  67. -- part name: BookMark
  68.  
  69.  
  70. -- part 18 (button)
  71. -- low flags: 00
  72. -- high flags: 2000
  73. -- rect: left=471 top=204 right=238 bottom=507
  74. -- title width / last selected line: 0
  75. -- icon id / first selected line: 27601 / 27601
  76. -- text alignment: 1
  77. -- font id: 0
  78. -- text size: 12
  79. -- style flags: 0
  80. -- line height: 16
  81. -- part name: PrintChapter
  82.  
  83.  
  84. -- part 29 (button)
  85. -- low flags: 00
  86. -- high flags: 2000
  87. -- rect: left=471 top=252 right=286 bottom=507
  88. -- title width / last selected line: 0
  89. -- icon id / first selected line: 22873 / 22873
  90. -- text alignment: 1
  91. -- font id: 0
  92. -- text size: 12
  93. -- style flags: 0
  94. -- line height: 16
  95. -- part name: GoHome
  96.  
  97.  
  98. -- part 19 (button)
  99. -- low flags: 00
  100. -- high flags: 2000
  101. -- rect: left=471 top=300 right=334 bottom=507
  102. -- title width / last selected line: 0
  103. -- icon id / first selected line: 12797 / 12797
  104. -- text alignment: 1
  105. -- font id: 0
  106. -- text size: 12
  107. -- style flags: 0
  108. -- line height: 16
  109. -- part name: GoJournal
  110.  
  111.  
  112. -- part 44 (field)
  113. -- low flags: 81
  114. -- high flags: 0000
  115. -- rect: left=266 top=29 right=50 bottom=359
  116. -- title width / last selected line: 0
  117. -- icon id / first selected line: 0 / 0
  118. -- text alignment: 0
  119. -- font id: 3
  120. -- text size: 12
  121. -- style flags: 0
  122. -- line height: 16
  123. -- part name: Text
  124.  
  125.  
  126. -- part 30 (field)
  127. -- low flags: 01
  128. -- high flags: 2000
  129. -- rect: left=151 top=40 right=59 bottom=300
  130. -- title width / last selected line: 0
  131. -- icon id / first selected line: 0 / 0
  132. -- text alignment: 1
  133. -- font id: 216
  134. -- text size: 12
  135. -- style flags: 0
  136. -- line height: 14
  137. -- part name: Title
  138.  
  139.  
  140. -- part 25 (field)
  141. -- low flags: 01
  142. -- high flags: 0000
  143. -- rect: left=10 top=32 right=44 bottom=49
  144. -- title width / last selected line: 0
  145. -- icon id / first selected line: 0 / 0
  146. -- text alignment: 0
  147. -- font id: 128
  148. -- text size: 5
  149. -- style flags: 0
  150. -- line height: 7
  151. -- part name: pageNo
  152.  
  153.  
  154. -- part 27 (button)
  155. -- low flags: 00
  156. -- high flags: 4002
  157. -- rect: left=45 top=5 right=22 bottom=76
  158. -- title width / last selected line: 0
  159. -- icon id / first selected line: 0 / 0
  160. -- text alignment: 1
  161. -- font id: 216
  162. -- text size: 9
  163. -- style flags: 0
  164. -- line height: 12
  165. -- part name: U
  166.  
  167.  
  168. -- part 33 (field)
  169. -- low flags: 81
  170. -- high flags: 0004
  171. -- rect: left=81 top=3 right=46 bottom=376
  172. -- title width / last selected line: 0
  173. -- icon id / first selected line: 0 / 0
  174. -- text alignment: 1
  175. -- font id: 3
  176. -- text size: 12
  177. -- style flags: 256
  178. -- line height: 16
  179. -- part name: Ref
  180.  
  181.  
  182. -- part 37 (button)
  183. -- low flags: 00
  184. -- high flags: 0000
  185. -- rect: left=420 top=23 right=56 bottom=450
  186. -- title width / last selected line: 0
  187. -- icon id / first selected line: 0 / 0
  188. -- text alignment: 1
  189. -- font id: 0
  190. -- text size: 12
  191. -- style flags: 0
  192. -- line height: 16
  193. -- part name: DogEar
  194. ----- HyperTalk script -----
  195. on mouseUp
  196.   dogEar
  197. end mouseUp
  198.  
  199.  
  200. -- part 41 (button)
  201. -- low flags: 00
  202. -- high flags: 0000
  203. -- rect: left=452 top=7 right=19 bottom=466
  204. -- title width / last selected line: 0
  205. -- icon id / first selected line: 0 / 0
  206. -- text alignment: 1
  207. -- font id: 0
  208. -- text size: 12
  209. -- style flags: 0
  210. -- line height: 16
  211. -- part name: LastCard
  212.  
  213.  
  214. -- part 47 (field)
  215. -- low flags: 81
  216. -- high flags: 4002
  217. -- rect: left=0 top=60 right=341 bottom=18
  218. -- title width / last selected line: 0
  219. -- icon id / first selected line: 0 / 0
  220. -- text alignment: 0
  221. -- font id: 216
  222. -- text size: 12
  223. -- style flags: 0
  224. -- line height: 14
  225. -- part name: NOS
  226.  
  227.  
  228. -- part 48 (button)
  229. -- low flags: 80
  230. -- high flags: 2000
  231. -- rect: left=471 top=15 right=49 bottom=507
  232. -- title width / last selected line: 0
  233. -- icon id / first selected line: 28895 / 28895
  234. -- text alignment: 1
  235. -- font id: 216
  236. -- text size: 9
  237. -- style flags: 0
  238. -- line height: 12
  239. -- part name: RefIndex
  240.  
  241.  
  242. -- part 42 (button)
  243. -- low flags: 80
  244. -- high flags: 2001
  245. -- rect: left=471 top=62 right=96 bottom=507
  246. -- title width / last selected line: 0
  247. -- icon id / first selected line: 28821 / 28821
  248. -- text alignment: 1
  249. -- font id: 216
  250. -- text size: 12
  251. -- style flags: 0
  252. -- line height: 16
  253. -- part name: find Next
  254. ----- HyperTalk script -----
  255. on mouseWithin
  256.   global Y1,doFind
  257.   if item 2 of mouseLoc() < (Y1 + 6) then
  258.     do doFind
  259.     wait 1 seconds
  260.   end if
  261. end mouseWithin
  262.  
  263. on mouseUp
  264.   FNBtn
  265. end mouseUp
  266.